home *** CD-ROM | disk | FTP | other *** search
/ Disc to the Future 2 / Disc to the Future Part II Programmer's Reference (Wayzata Technology)(6013)(1992).bin / MAC / THINKC / 4_0 / NAME_USE / NAME_USE.C < prev   
C/C++ Source or Header  |  1989-06-22  |  418b  |  22 lines
  1. #include <SetUpA4.h>
  2.  
  3. pascal void main(void);
  4. void inside(void);
  5.  
  6. void inside()
  7. {
  8.     StringHandle chooser_string;
  9.     chooser_string = (StringHandle)GetResource ('STR ', -16096);
  10.     SetString ((Handle)chooser_string, "\P");
  11.     ChangedResource((Handle)chooser_string);
  12.     WriteResource((Handle)chooser_string);
  13.     ReleaseResource((Handle)chooser_string);
  14. }
  15.  
  16. pascal void main()
  17. {
  18.     RememberA0();
  19.     SetUpA4();
  20.     inside();
  21.     RestoreA4();
  22. }